IF PL4=1
   KODE=DRUG_CODE
   NAME=DRUG_NAME
   TIPE=DRUG_TYPE
   QANT=DRUG_QANT
   UNIT=DRUG_UNIT
ELSE
   KODE=DISP_CODE
   NAME=DISP_NAME
   TIPE=DISP_TYPE
   QANT=DISP_QANT
   UNIT=DISP_UNIT
ENDIF
